

(tagbody
   (go tag2)
   tag1
   (print "This is tag1")
   tag2
   (print "This is tag2"))